From: Jim Blandy Date: Tue, 29 Jun 1993 23:03:21 +0000 (+0000) Subject: * gnus.el (gnus-newsrc-to-gnus-format): Correct regexp which X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95138 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=b7e264f6806301897e7a60eb429371d8a6392e42;p=emacs.git * gnus.el (gnus-newsrc-to-gnus-format): Correct regexp which matches .newsrc lines not to match more than one line. --- diff --git a/lisp/gnus.el b/lisp/gnus.el index 0659418df7b..935dca78b87 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -1,6 +1,6 @@ ;;; GNUS: an NNTP-based News Reader for GNU Emacs ;; Copyright (C) 1987, 1988, 1989, 1990, 1993 Free Software Foundation, Inc. -;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/gnus.el,v 1.20 1993/06/10 10:40:16 jimb Exp jimb $ +;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/gnus.el,v 1.21 1993/06/10 11:46:43 jimb Exp jimb $ ;; This file is part of GNU Emacs. @@ -6571,7 +6571,7 @@ If optional argument RAWFILE is non-nil, the raw startup file is read." ;; but no longer viable because of extensive backtracking in Emacs 19: ;; "^\\([^:! \t\n]+\\)\\([:!]\\)[ \t]*\\(\\(...\\)*.*\\)$" nil t) (while (re-search-forward - "^\\([^:! \t\n]+\\)\\([:!]\\)[ \t]*\\(\\|[^ \t].*\\)$" nil t) + "^\\([^:! \t\n]+\\)\\([:!]\\)[ \t]*\\(\\|[^ \t\n].*\\)$" nil t) (setq newsgroup (buffer-substring (match-beginning 1) (match-end 1))) ;; Check duplications of newsgroups. ;; Note: Checking the duplications takes very long time.